projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
653848a
)
Add a couple more shell-tests-split-string tests
author
Lars Ingebrigtsen
<larsi@gnus.org>
Thu, 15 Jul 2021 23:42:49 +0000
(
01:42
+0200)
committer
Lars Ingebrigtsen
<larsi@gnus.org>
Thu, 15 Jul 2021 23:42:55 +0000
(
01:42
+0200)
test/lisp/shell-tests.el
patch
|
blob
|
history
diff --git
a/test/lisp/shell-tests.el
b/test/lisp/shell-tests.el
index c4147088a2e800aa02af7d1c6f20c973b1297a56..223a18590b1b667da4305b608832020f689af8ed 100644
(file)
--- a/
test/lisp/shell-tests.el
+++ b/
test/lisp/shell-tests.el
@@
-54,6
+54,10
@@
'("ls" "/tmp/foo bar")))
(should (equal (split-string-shell-command "ls /tmp/'foo bar'")
'("ls" "/tmp/foo bar")))
+ (should (equal (split-string-shell-command "ls /tmp/'foo\"bar'")
+ '("ls" "/tmp/foo\"bar")))
+ (should (equal (split-string-shell-command "ls /tmp/\"foo''bar\"")
+ '("ls" "/tmp/foo''bar")))
(should (equal (split-string-shell-command "ls /tmp/'foo\\ bar'")
'("ls" "/tmp/foo\\ bar")))
(unless (memq system-type '(windows-nt ms-dos))